Private Sub Test(Optional ByVal foo As enmSomeEnum = enmSomeEnum.Bar)
End Sub